use dta\Turnout_District_Level, clear 

sort year PR_district
drop _merge
merge year PR_district using dta\AlternativeMargin2

drop if _merge==2 /* PR-districts not in sample */

***********************************************************

/* KDENSITY - COMPETITION CONTRACTION */

twoway (kdensity C1 if year<1920, lwidth(thin)) (kdensity C1 if year>1920 & year<1930, lwidth(medthick)), ///
title("") xtitle(Index of Competition) ytitle("") legend(order(1 "1909-1918" 2 "1921-1927") pos(1) ring(0) col(1)) ///
plotregion(lcolor(white) ilcolor(white)) graphregion(fcolor(white)) scheme(s2mono) 
*graph export figures\kdensity_GS.tif, replace
*graph export figures\kdensity_GS.eps, replace
graph export figures\FigureA3.tif, replace
graph export figures\FigureA3.eps, replace
